home *** CD-ROM | disk | FTP | other *** search
- object UrlTestForm: TUrlTestForm
- Left = 200
- Top = 108
- Width = 352
- Height = 399
- AxBorderStyle = afbSunken
- Caption = 'URL Test'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox1: TGroupBox
- Left = 35
- Top = 8
- Width = 273
- Height = 73
- Caption = 'Click any of the following hyperlinks:'
- TabOrder = 0
- object Label1: TLabel
- Left = 36
- Top = 32
- Width = 70
- Height = 13
- Cursor = crHandPoint
- Caption = 'Inprise website'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = Label1Click
- end
- object Label2: TLabel
- Left = 140
- Top = 32
- Width = 44
- Height = 13
- Cursor = crHandPoint
- Caption = 'Foward >'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = Label2Click
- end
- object Label3: TLabel
- Left = 212
- Top = 32
- Width = 34
- Height = 13
- Cursor = crHandPoint
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = Label3Click
- end
- end
- object Panel1: TPanel
- Left = 8
- Top = 152
- Width = 329
- Height = 201
- BevelOuter = bvNone
- TabOrder = 2
- end
- object Button1: TButton
- Left = 10
- Top = 120
- Width = 75
- Height = 25
- Caption = 'Demo'
- TabOrder = 3
- OnClick = Button1Click
- end
- object StatusPanel: TPanel
- Left = 0
- Top = 355
- Width = 344
- Height = 17
- Align = alBottom
- Alignment = taLeftJustify
- BevelOuter = bvLowered
- TabOrder = 4
- end
- object ProgressBar1: TProgressBar
- Left = 92
- Top = 120
- Width = 241
- Height = 25
- Min = 0
- Max = 100
- TabOrder = 5
- end
- object MediaPlayer1: TMediaPlayer
- Left = 45
- Top = 160
- Width = 253
- Height = 25
- Display = Panel1
- Visible = False
- TabOrder = 1
- end
- object ServerName: TEdit
- Left = 147
- Top = 88
- Width = 121
- Height = 21
- TabOrder = 6
- Text = 'steixeira'
- end
- object StaticText1: TStaticText
- Left = 75
- Top = 90
- Width = 75
- Height = 17
- Caption = '&Server Name:'
- FocusControl = ServerName
- TabOrder = 7
- end
- end
-